#
#  Para definir o task usar: task quickred = "$PATH/quickred.cl"
#

procedure teste2k(input,flat_im,output)

string input
string flat_im
string output

begin


apall (flat_im,
512, output="", apertures="", format="multispec", references="", profiles="",
interactive=yes, find=yes, recenter=yes, resize=no, edit=yes, trace=no,
fittrace=no, extract=no, extras=no, review=no, line=INDEF, nsum=-50,
lower=-1.5, upper=1.5, apidtable="", b_function="chebyshev", b_order=1,
b_sample="-10:-6,6:10", b_naverage=-3, b_niterate=0, b_low_reject=3.,
b_high_rejec=3., b_grow=0., width=4., radius=5., threshold=0., minsep=2.,
maxsep=1000., order="increasing", aprecenter="", npeaks=INDEF, shift=no,
llimit=INDEF, ulimit=INDEF, ylevel=0.1, peak=yes, bkg=yes, r_grow=0.,
avglimits=no, t_nsum=10, t_step=10, t_nlost=3, t_function="legendre",
t_order=2, t_sample="*", t_naverage=1, t_niterate=0, t_low_reject=3.,
t_high_rejec=3., t_grow=0., background="none", skybox=1, weights="none",
pfit="fit1d", clean=no, saturation=INDEF, readnoise="0.", gain="1.",
lsigma=4., usigma=4., nsubaps=1)

apall (input,
512, output=output, apertures="", format="multispec", references=flat_im,
profiles="", interactive=no, find=yes, recenter=no, resize=no, edit=no,
trace=no, fittrace=no, extract=yes, extras=no, review=no, line=INDEF,
nsum=-10, lower=-1.5, upper=1.5, apidtable="", b_function="chebyshev",
b_order=1, b_sample="-10:-6,6:10", b_naverage=-3, b_niterate=0,
b_low_reject=3., b_high_rejec=3., b_grow=0., width=4., radius=5.,
threshold=0., minsep=2., maxsep=1000., order="increasing", aprecenter="",
npeaks=INDEF, shift=no, llimit=INDEF, ulimit=INDEF, ylevel=0.1, peak=yes,
bkg=yes, r_grow=0., avglimits=no, t_nsum=10, t_step=10, t_nlost=3,
t_function="legendre", t_order=2, t_sample="*", t_naverage=1, t_niterate=0,
t_low_reject=3., t_high_rejec=3., t_grow=0., background="none", skybox=1,
weights="none", pfit="fit1d", clean=no, saturation=INDEF, readnoise="0.",
gain="1.", lsigma=4., usigma=4., nsubaps=1)


end







